package com.carrot.framework.interceptor;

import cn.hutool.core.bean.BeanUtil;
import cn.hutool.core.convert.Convert;
import cn.hutool.core.date.DateUtil;
import cn.hutool.core.util.ReflectUtil;
import cn.hutool.core.util.StrUtil;
import com.baomidou.mybatisplus.annotation.TableField;
import com.carrot.framework.constants.MyBatisConstants;
import com.carrot.framework.util.FieldUtil;
import com.google.common.collect.Lists;
import lombok.extern.slf4j.Slf4j;
import org.apache.commons.lang3.builder.ToStringBuilder;
import org.apache.ibatis.binding.MapperMethod;
import org.apache.ibatis.executor.Executor;
import org.apache.ibatis.mapping.MappedStatement;
import org.apache.ibatis.mapping.SqlCommandType;
import org.apache.ibatis.plugin.*;

import java.lang.reflect.Field;
import java.lang.reflect.InvocationTargetException;
import java.util.*;
import java.util.function.Consumer;

/**
 * MyBatis 拦截器 注入属性用
 * Plus中的自动注入器太难用了
 * @author liuhongzhen
 */
@Slf4j
@Intercepts(@Signature(type = Executor.class, method = "update", args = {MappedStatement.class, Object.class}))
public class MybatisAutoFillInterceptor implements Interceptor {

    private static final String ET = "et";

    /** 实体类字段 */
    static private final Map<Class<?>, Field[]> ENTITY_FIELD_MAP = new HashMap<>();

    @Override
    public Object intercept(Invocation invocation) throws IllegalAccessException, InvocationTargetException {
        fillField(invocation);
        return invocation.proceed();
    }

    /**
     * 注入字段
     * @param invocation 源
     */
    private void fillField(Invocation invocation) {
        Object[] args = invocation.getArgs();
        SqlCommandType sqlCommandType = null;
        for (Object arg : args) {
            //第一个参数处理。根据它判断是否给“操作属性”赋值。
            //如果是第一个参数 MappedStatement
            if (arg instanceof MappedStatement) {
                MappedStatement ms = (MappedStatement) arg;
                sqlCommandType = ms.getSqlCommandType();
                //如果是“增加”或“更新”操作，则继续进行默认操作信息赋值。否则，则退出
                if (sqlCommandType == SqlCommandType.INSERT
                        || sqlCommandType == SqlCommandType.UPDATE
                    ) {
                    continue;
                } else {
                    break;
                }
            }
            if (sqlCommandType == SqlCommandType.INSERT) {
                // 新增
                this.insertFill(arg);
            } else if (sqlCommandType == SqlCommandType.UPDATE) {
                // 修改
                this.updateFill(arg);
            }
        }
    }

    /**
     * 新增数据
     * @param arg 参数
     */
    public void insertFill(Object arg) {
        if(arg == null ){
            return;
        }
        // 当前时间
        Date currDate = DateUtil.date();

        loopHandlerField(arg, (dbFieldName)->{
            String fieldName = FieldUtil.underlineToHump(dbFieldName);
            switch (dbFieldName) {
                // 创建人/更新人
                case MyBatisConstants.FIELD_CREATE_BY:
                case MyBatisConstants.FIELD_UPDATE_BY:
                    // 如果创建人/更新人 为空则进行默认赋值
                    Object createValue = ReflectUtil.getFieldValue(arg, fieldName);

                    // 默认是系统用户
                    if(StrUtil.isBlank(Convert.toStr(createValue))){
                        // 赋值用户 UID
//                        LoginUserInfo loginUserInfo = UserContextHolder.getCurrUser().get();
                        BeanUtil.setProperty(arg, fieldName, MyBatisConstants.SYSTEM_ID);
                    }
                    break;
                // 创建日期/更新日期
                case MyBatisConstants.FIELD_CREATE_TIME:
                case MyBatisConstants.FIELD_UPDATE_TIME:
                    BeanUtil.setProperty(arg, fieldName, currDate);
                    break;
                // 乐观锁
                case MyBatisConstants.FIELD_OPTIMISTIC_LOCK:
                    BeanUtil.setProperty(arg, fieldName, 0);
                    break;
                // 逻辑删除
                case MyBatisConstants.FIELD_DELETE_LOGIC:
                    BeanUtil.setProperty(arg, fieldName,  MyBatisConstants.LOGIC_NOT_DELETE_VALUE);
                    break;
                default:
                    break;
            }
        });
        log.info(ToStringBuilder.reflectionToString(arg));
    }

    /**
     * 修改数据
     * @param arg 参数
     */
    public void updateFill(Object arg) {
        if(arg == null ){
            return;
        }
        // 修改这儿 有可能会拿到一个 MapperMethod，需要特殊处理
        if (arg instanceof MapperMethod.ParamMap) {
            MapperMethod.ParamMap<?> paramMap = (MapperMethod.ParamMap<?>) arg;
            if (paramMap.containsKey(ET)) {
                arg = paramMap.get(ET);
            } else {
                arg = paramMap.get("param1");
            }
            if (arg == null) {
                return;
            }
        }

        final Object argObj = arg;
        // 当前时间
        Date currDate = DateUtil.date();

        loopHandlerField(argObj, (dbFieldName)->{
            String fieldName = FieldUtil.underlineToHump(dbFieldName);
            switch (dbFieldName) {
                // 更新人
                case MyBatisConstants.FIELD_UPDATE_BY:
                    // 如果创建人/更新人 为空则进行默认赋值
                    Object createValue = ReflectUtil.getFieldValue(argObj, fieldName);
                    if(StrUtil.isBlank(Convert.toStr(createValue))){
                        BeanUtil.setProperty(argObj, fieldName, MyBatisConstants.SYSTEM_ID);
                    }
                    break;
                // 更新日期
                case MyBatisConstants.FIELD_UPDATE_TIME:
                    BeanUtil.setProperty(argObj, fieldName, currDate);
                    break;
                default:
                    break;
            }
        });
    }


    /**
     * 循环处理字段
     *
     * @param arg 参数
     * @param callback 回调函数
     */
    private void loopHandlerField(Object arg, Consumer<String> callback){
        // 排除字段
        List<String> existField = Lists.newArrayList();

        // 字段缓存 减少每次更新 反射
        Field[] fields = ENTITY_FIELD_MAP.get(arg.getClass());
        if(fields == null){
            fields = ReflectUtil.getFields(arg.getClass());
            ENTITY_FIELD_MAP.put(arg.getClass(), fields);
        }

        for (Field f : fields) {
            // 判断是否是排除字段
            if (existField.contains(f.getName())) {
                continue;
            }

            // 如果设置为忽略字段 则直接跳过不处理
            TableField tableField = f.getAnnotation(TableField.class);
            if (tableField != null) {
                if (!tableField.exist()) {
                    existField.add(f.getName());
                    continue;
                }
            }

            // 回调函数
            callback.accept(FieldUtil.humpToUnderline(f.getName()));
        }
    }

    // =======================================

    @Override
    public Object plugin(Object o) {
        return Plugin.wrap(o, this);
    }

    @Override
    public void setProperties(Properties properties) {
    }

}
